home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Amiga Club Hoorn
/
ACH ClubDiskette No.23 (1995-04)(Amiga Club Hoorn)(NL).zip
/
ACH ClubDiskette No.23 (1995-04)(Amiga Club Hoorn)(NL).adf
/
C
/
Installer
< prev
next >
Wrap
AmigaDOS Script File
|
1995-02-21
|
956b
|
40 lines
.key Disknummer/A,Disknaam/A,Lhafile/A
; $VER: Lha Script V3.0 (09.01.95) Author: S. Kindervater
copy <Disknummer>:c/format to ram:
copy <Disknummer>:c/install to ram:
copy <Disknummer>:c/lha to ram:
copy <Disknummer>:c/endif to ram:
copy <Disknummer>:c/echo to ram:
copy <Disknummer>:c/failat to ram:
copy <Disknummer>:c/endcli to ram:
copy <Disknummer>:c/delete to ram:
copy <Lhafile> to ram:
cd ram:
requestchoice >ENV:LhaTemp "Lha Script V3.0" "Kies een drive " "DF0|DF1|Cancel"
if val $LHATEMP EQ 1
Echo "Stop een lege disk in DF0"
Format Drive DF0: name <Disknaam> NOICONS
install drive df0:
Skip End
endif
if val $LHATEMP EQ 2
Echo "Stop een lege disk in DF1"
Format Drive DF1: name <Disknaam> NOICONS
install drive df1:
Skip end
else
Skip lastend
endif
lab end
Echo "Uitelkaar halen van de Lha File .."
lha >NIL: e,x ram:<Lhafile> <Disknaam>:
Lab lastend
delete >NIL: ram:<Lhafile>
Delete env:LHATemp >NIL: